
function xOut=tanh(xIn)
  x = xIn.v;
  xOut.v=tanh(x);
  d = sech(x).^2;
  xOut.d = elelmult_lastindx(d,xIn.d);

  xOut=class(xOut,'deriv1f');
